10 IFA=1THENSYS49152:GOTO50
20 IFA=2THENSYS65371:SYS7869:GOTO60
30 IFA=3THENSYS4690:END
40 POKE45,200:POKE46,8:CLR:A=1:LOAD"T",8,1
50 A=2:LOAD"ALL21",8,1
60 A=3:LOAD"VX43+",8,1